home *** CD-ROM | disk | FTP | other *** search
/ Amiga Developer CD 2.1 / Amiga Developer CD v2.1.iso / Extras / Development / RKM_Companion_v2.04 / Keyboard / Keyhandler.a < prev    next >
Encoding:
Text File  |  1999-10-27  |  3.0 KB  |  85 lines
  1. *
  2. * Copyright (c) 1992-1999 Amiga, Inc. 
  3. * 
  4. * This example is provided in electronic form by Amiga, Inc. for 
  5. * use with the "Amiga ROM Kernel Reference Manual: Devices", 3rd Edition, 
  6. * published by Addison-Wesley (ISBN 0-201-56775-X).
  7. * 
  8. * The "Amiga ROM Kernel Reference Manual: Devices" contains additional 
  9. * information on the correct usage of the techniques and operating system 
  10. * functions presented in these examples.  The source and executable code 
  11. * of these examples may only be distributed in free electronic form, via 
  12. * bulletin board or as part of a fully non-commercial and freely 
  13. * redistributable diskette.  Both the source and executable code (including 
  14. * comments) must be included, without modification, in any copy.  This 
  15. * example may not be published in printed form or distributed with any
  16. * commercial product.  However, the programming techniques and support
  17. * routines set forth in these examples may be used in the development
  18. * of original executable software products for Amiga computers.
  19. * 
  20. * All other rights reserved.
  21. * 
  22. * This example is provided "as-is" and is subject to change; no
  23. * warranties are made.  All use is at your own risk. No liability or
  24. * responsibility is assumed.
  25. *
  26. ****************************************************************************
  27. *
  28. *       KeyHandler.a
  29. *
  30. * Keyboard reset handler that signals the task in the structure...
  31. *
  32. *
  33. * See Key_Reset.c for details on how to compile/assemble/link...
  34. *
  35. ************************************************************************
  36. * Required includes...
  37. *
  38. *       CSECT   KeyHandler      ;SAS/Lattice ASM command requires this
  39. *
  40. *       INCDIR  "include:"
  41.  
  42.     section    text,code
  43.  
  44.         INCLUDE "exec/types.i"
  45.         INCLUDE "exec/io.i"
  46.         INCLUDE "devices/keyboard.i"
  47. *
  48.         xref    _AbsExecBase    ; We get this from outside...
  49.         xref    _LVOSignal      ; We get this from outside...
  50. *
  51. ************************************************************************
  52. * Make the entry point external...
  53. *
  54.         xdef    _ResetHandler
  55. *
  56. ************************************************************************
  57. *
  58. * This is the input handler
  59. * The is_Data field is passed to you in a1.
  60. *
  61. * This is the structure that is passed in A1 in this example...
  62. *
  63.         STRUCTURE       MyData,0
  64.         APTR            MyTask
  65.         ULONG           MySignal
  66. *
  67. ************************************************************************
  68. * The handler gets called here...
  69. *
  70. _ResetHandler:  move.l  MySignal(a1),d0 ; Get signal to send
  71.                 move.l  MyTask(a1),a1           ; Get task
  72. *
  73. * Now signal the task...
  74. *
  75.                 move.l  a6,-(sp)        ; Save the stack...
  76.                 move.l  _AbsExecBase,a6 ; Get ExecBase
  77.                 jsr     _LVOSignal(a6)  ; Send the signal
  78.                 move.l  (sp)+,a6        ; Restore A6
  79. *
  80. * Return to let other handlers execute.
  81. *
  82.                 rts                     ; return from handler...
  83. ************************************************************************
  84.                 END
  85.